This script merges CalMAPPER activity data with treatment polygons. This is a necessary step before analyzing prescribed fire data in CalMAPPER.
calmapper_dir <- fs::dir_ls(ref_path, recurse = T, glob = '*CalMAPPER', type = 'directory')
calmapper_files <- fs::dir_ls(calmapper_dir, recurse = T, glob = '*.gdb')
if(length(calmapper_files) > 1){
stop( "There's more than one CalMAPPER .gdb file. script assumes only 1.")
}
st_layers(calmapper_files)
## Driver: OpenFileGDB
## Available layers:
## layer_name geometry_type features fields
## 1 CMDash_ProjectTreatments Multi Polygon 1560 21
## 2 CMDash_TreatmentPols Multi Polygon 2784 23
## 3 CMDash_TreatmentLines Multi Line String 23 22
## 4 CMDash_TreatmentPnts Multi Point 136 20
## 5 CMDash_Activities NA 20439 38
## 6 CMDash_Metadata NA 1 7
## crs_name
## 1 WGS 84 / Pseudo-Mercator
## 2 WGS 84 / Pseudo-Mercator
## 3 WGS 84 / Pseudo-Mercator
## 4 WGS 84 / Pseudo-Mercator
## 5 <NA>
## 6 <NA>
act <- st_read(calmapper_files, layer = 'CMDash_Activities')
## Reading layer `CMDash_Activities' from data source
## `C:\Users\ctubbesi\OneDrive - California Air Resources Board\Documents\Reference data\CALFIRE spatial data\CalMAPPER\CALFIRE_FuelReductionProjects_2023\CALFIRE_FuelReductionProjects.gdb'
## using driver `OpenFileGDB'
## Warning: no simple feature geometries present: returning a data.frame or tbl_df
trt <- st_read(calmapper_files, layer = 'CMDash_TreatmentPols')
## Reading layer `CMDash_TreatmentPols' from data source
## `C:\Users\ctubbesi\OneDrive - California Air Resources Board\Documents\Reference data\CALFIRE spatial data\CalMAPPER\CALFIRE_FuelReductionProjects_2023\CALFIRE_FuelReductionProjects.gdb'
## using driver `OpenFileGDB'
## Warning in CPL_read_ogr(dsn, layer, query, as.character(options), quiet, : GDAL
## Message 1: organizePolygons() received a polygon with more than 100 parts. The
## processing may be really slow. You can skip the processing by setting
## METHOD=SKIP, or only make it analyze counter-clock wise parts by setting
## METHOD=ONLY_CCW if you can assume that the outline of holes is counter-clock
## wise defined
## Simple feature collection with 2784 features and 23 fields
## Geometry type: MULTIPOLYGON
## Dimension: XY
## Bounding box: xmin: -13842530 ymin: 3842624 xmax: -12941530 ymax: 5161286
## Projected CRS: WGS 84 / Pseudo-Mercator
act <- act %>%
filter(!ACTIVITY_DESCRIPTION %in% c("GIS Validation", "Education Outreach", "Project Administration", "Planning Meeting", "Public Contacts", "Water Site Development"))
act <- act %>%
mutate(ACTIVITY_START_date = as.Date(ACTIVITY_START, format = "%m/%d/%Y")) %>%
mutate(PROJECT_START_DATE_date = as.Date(ACTIVITY_END, format = "%m/%d/%Y"))
act <- act %>%
mutate(ACTIVITY_START_date = if_else(is.na(ACTIVITY_START_date), PROJECT_START_DATE_date, ACTIVITY_START_date))
act %>%
filter(ACTIVITY_START_date > "2020-01-01" & ACTIVITY_START_date < "2020-12-31") %>%
group_by(ACTIVITY_DESCRIPTION) %>%
summarize(acres = sum(TREATED_ACRES)) %>%
arrange(desc(acres)) %>%
print(n = 35)
## # A tibble: 42 × 2
## ACTIVITY_DESCRIPTION acres
## <chr> <dbl>
## 1 Broadcast Burn 16373.
## 2 Thinning (Mechanical) 12598.
## 3 Thinning (Manual) 9798.
## 4 Mastication 8885.
## 5 Chipping 8843.
## 6 Piling (Manual) 6074.
## 7 Pile Burning 3295.
## 8 Piling (Mechanical) 3142.
## 9 Herbicide (Post-Treatment) 1676.
## 10 Crushing 1456.
## 11 Lop and Scatter 1033.
## 12 Fuel Break (Shaded) 953.
## 13 Follow up - Slash disposal 918.
## 14 Commercial Thinning (Tractor Yarding) 717.
## 15 Site Preparation (CFIP) 644.
## 16 Herbicide (Pre-Treatment) 562.
## 17 Pruning 520.
## 18 Grazing 508
## 19 Follow up - Herbicide 485.
## 20 Release - Mechanical 410.
## 21 Thinning 346
## 22 Rangeland Mowing 305.
## 23 Release - Herbicide 283.
## 24 Chaining 158.
## 25 Follow up - Other 64.2
## 26 Commercial Thinning (Cable Yarding) 56.1
## 27 Land Conservation 42
## 28 Erosion Control 11
## 29 Air Curtain Burner 0
## 30 Biomass Removal (Bone Dry Tons) 0
## 31 Boundary Mapping 0
## 32 Dozer Line 0
## 33 Environmental Review 0
## 34 Hand Line 0
## 35 Limbing and Bucking 0
## # ℹ 7 more rows
# join act with trt to get geometry. use projectID, treatmentID
act_sf <- right_join(trt %>% select(PROJECT_ID, TREATMENT_ID),
act)
## Joining with `by = join_by(PROJECT_ID, TREATMENT_ID)`
# clean up the data
act_sf <- act_sf[!st_is_empty(act_sf),] # remove empties
act_sf %>%
st_drop_geometry() %>%
group_by(ACTIVITY_DESCRIPTION) %>%
count() %>%
print(n=50)
## # A tibble: 45 × 2
## # Groups: ACTIVITY_DESCRIPTION [45]
## ACTIVITY_DESCRIPTION n
## <chr> <int>
## 1 Biomass Removal (Bone Dry Tons) 67
## 2 Boundary Mapping 41
## 3 Broadcast Burn 868
## 4 Chaining 100
## 5 Chipping 1992
## 6 Commercial Thinning (Cable Yarding) 20
## 7 Commercial Thinning (Tractor Yarding) 42
## 8 Crushing 51
## 9 Cultural Burning 5
## 10 Dozer Line 28
## 11 Environmental Review 97
## 12 Erosion Control 12
## 13 Follow up - Herbicide 58
## 14 Follow up - Other 6
## 15 Follow up - Slash disposal 177
## 16 Fuel Break (Shaded) 55
## 17 Grazing 52
## 18 Hand Line 72
## 19 Herbicide (Post-Treatment) 43
## 20 Herbicide (Pre-Treatment) 17
## 21 Invasive Plant Removal 7
## 22 Land Conservation 4
## 23 Limbing and Bucking 1166
## 24 Lop and Scatter 712
## 25 Mastication 1241
## 26 Pile Burning 1919
## 27 Piling (Manual) 2518
## 28 Piling (Mechanical) 375
## 29 Pruning 357
## 30 Public Meetings 8
## 31 RPF Supervision 86
## 32 Rangeland Mowing 61
## 33 Release - Herbicide 16
## 34 Release - Mechanical 99
## 35 Release - Other 10
## 36 Road Grading 1
## 37 Site Assessment 93
## 38 Site Preparation (CFIP) 71
## 39 Site Preparation (Manual) 77
## 40 Site Preparation (Mechanical) 7
## 41 Site Preparation (RxBurn) 187
## 42 Thinning 287
## 43 Thinning (Manual) 4120
## 44 Thinning (Mechanical) 405
## 45 Trees Felled (> 6in dbh) 941
act_sf_fire <-
act_sf %>%
filter(ACTIVITY_DESCRIPTION %in% c("Broadcast Burn", "Cultural Burning", "Pile Burning", "Site Preparation (RxBurn)"))
save(act_sf, file = "~/Reference data/CALFIRE spatial data/CalMAPPER/activities_fire.Rdata")
write.csv(act_sf %>% st_drop_geometry(), file = "~/Reference data/CALFIRE spatial data/CalMapper/activities_fire.csv", row.names = F)
write.csv(trt %>% st_drop_geometry(), file = "~/Reference data/CALFIRE spatial data/CalMapper/treatments_fire.csv", row.names = F)
act_broadcast <- act_sf %>%
filter(ACTIVITY_DESCRIPTION == "Broadcast Burn")
trt %>%
st_drop_geometry() %>%
group_by(TREATMENT_OBJECTIVE) %>%
count()
## # A tibble: 5 × 2
## # Groups: TREATMENT_OBJECTIVE [5]
## TREATMENT_OBJECTIVE n
## <chr> <int>
## 1 Broadcast Burn 559
## 2 Forestland Stewardship 296
## 3 Fuel Break 215
## 4 Fuel Reduction 1542
## 5 Right of Way Clearance 172
trt_broadcast <- trt %>%
filter(TREATMENT_OBJECTIVE == "Broadcast Burn") %>%
filter(ACTIVITY_STATUS == "Complete")
act_broadcast that
aren’t in trt_broadcastact_broadcast %>%
filter(!TREATMENT_ID %in% trt_broadcast$TREATMENT_ID)
## Simple feature collection with 368 features and 40 fields
## Geometry type: MULTIPOLYGON
## Dimension: XY
## Bounding box: xmin: -13836290 ymin: 3843456 xmax: -12942550 ymax: 5161286
## Projected CRS: WGS 84 / Pseudo-Mercator
## First 10 features:
## PROJECT_ID TREATMENT_ID ACTIVITY_ID AQ_ID PROJECT_NAME
## 1 7604 14761 29322 346913 Tule Lake Rx 1A
## 2 4943 6741 29593 359058 Herbert Burn
## 3 7428 12760 23636 224350 Williams Ranch
## 4 2242 3207 21917 179217 SLU-Camp SLO
## 5 5042 6804 29998 374161 Wiggins Burn/Class
## 6 8060 14755 29254 347633 Yaro VMP
## 7 7302 14758 29697 358097 I-5 RX1 Burn
## 8 7302 14758 29779 361297 I-5 RX1 Burn
## 9 7863 12320 22572 198739 State Parks Fuel Reduction
## 10 3785 14689 29072 332246 Bridges VMP
## TREATMENT_NAME ACTIVITY_NAME
## 1 Tule Lake RX 2023 Broadcast 2023
## 2 Herbert Burn 2023 Burn
## 3 22 Williams Ranch RX 22 Williams Ranch RX
## 4 Camp SLO Rx Burn 2021 Camp SLO
## 5 2023 (and 2017)Wiggins Burn/Class Wiggins Burn Class (234) 2023
## 6 Broadcast Burn Broadcast Burn
## 7 Grapevine Flats Rx Burn 2023 PSB Northbound Flats and Lower
## 8 Grapevine Flats Rx Burn 2023 PSB Southbound Lower
## 9 Boyes Prairie Rx 2021 Rx Burn
## 10 2022 Bridges Rx Fire 2022 Bridges Rx Fire - Broadcast Burn
## CALMAPPER_ID REGION UNIT UNIT_CODE
## 1 2600-2021-FPL-001 NORTH Siskiyou Unit (SKU) SKU
## 2 4100-2017-FPL-008 SOUTH Tulare Unit (TUU) TUU
## 3 2400-2020-VMP-001 NORTH Shasta-Trinity Unit (SHU) SHU
## 4 3400-2015-FPL-008 SOUTH San Luis Obispo Unit (SLU) SLU
## 5 1400-2017-FPL-008 NORTH Sonoma-Lake-Napa Unit (LNU) LNU
## 6 3400-2022-VMP-001 SOUTH San Luis Obispo Unit (SLU) SLU
## 7 4010-2020-FPL-006 SOUTH Kern CFD (KRN) KRN
## 8 4010-2020-FPL-006 SOUTH Kern CFD (KRN) KRN
## 9 1200-2021-FPL-006 NORTH Humboldt-Del Norte Unit (HUU) HUU
## 10 1100-2016-VMP-004 NORTH Mendocino Unit (MEU) MEU
## COUNTY_NAME PROJECT_TYPE TREATMENT_OBJECTIVE
## 1 Siskiyou County Fire Plan Broadcast Burn
## 2 Tulare County Fire Plan Broadcast Burn
## 3 Shasta County VMP Broadcast Burn
## 4 San Luis Obispo County Fire Plan Broadcast Burn
## 5 Colusa County Fire Plan Broadcast Burn
## 6 San Luis Obispo County VMP Broadcast Burn
## 7 Kern County Fire Plan Broadcast Burn
## 8 Kern County Fire Plan Broadcast Burn
## 9 Humboldt County Fire Plan Broadcast Burn
## 10 Mendocino County VMP Broadcast Burn
## OBJECTIVE_FULL ACTIVITY_DESCRIPTION GROUND_DISTURBING
## 1 Broadcast Burn (Polygon) Broadcast Burn Yes
## 2 Broadcast Burn (Polygon) Broadcast Burn Yes
## 3 Broadcast Burn (Polygon) Broadcast Burn Yes
## 4 Broadcast Burn (Polygon) Broadcast Burn Yes
## 5 Broadcast Burn (Polygon) Broadcast Burn Yes
## 6 Broadcast Burn (Polygon) Broadcast Burn Yes
## 7 Broadcast Burn (Polygon) Broadcast Burn Yes
## 8 Broadcast Burn (Polygon) Broadcast Burn Yes
## 9 Broadcast Burn (Polygon) Broadcast Burn Yes
## 10 Broadcast Burn (Polygon) Broadcast Burn Yes
## BURN_TYPE AGENCY_NAME AGENCY_LOCAL_NAME
## 1 Cooperator Assist CAL FIRE SKU
## 2 Training Burn CAL FIRE <NA>
## 3 VMP CAL FIRE SHU
## 4 Training Burn CAL FIRE SLU
## 5 Training Burn CAL FIRE <NA>
## 6 VMP CAL FIRE SLU Fuels Crew
## 7 Training Burn Contract County Kern County Fire Department
## 8 Training Burn Contract County Kern County Fire Department
## 9 Cooperator Assist CAL FIRE <NA>
## 10 VMP CAL FIRE <NA>
## COOPERATOR ACTIVITY_START ACTIVITY_END
## 1 US Fish and Wildlife Service (USFWS) 2023-04-19 17:00:00 2023-04-19 17:00:00
## 2 <NA> 2023-06-15 17:00:00 2023-06-16 17:00:00
## 3 <NA> 2022-01-23 16:00:00 2022-01-27 16:00:00
## 4 <NA> 2021-06-23 17:00:00 2021-06-23 17:00:00
## 5 <NA> 2023-07-17 17:00:00 2023-07-18 17:00:00
## 6 <NA> 2023-04-23 17:00:00 2023-04-27 17:00:00
## 7 <NA> 2023-06-15 17:00:00 2023-06-16 17:00:00
## 8 <NA> 2023-06-21 17:00:00 2023-06-22 17:00:00
## 9 California State Parks (CSP) 2021-09-22 17:00:00 2021-09-22 17:00:00
## 10 <NA> 2022-02-28 16:00:00 2022-03-31 17:00:00
## PROJECT_STATUS ACTIVITY_STATUS QUANTITY UNIT_OF_MEASURE
## 1 Active Active 536.4 Acres
## 2 Active Complete 363.0 Acres
## 3 Active Active 493.4 Acres
## 4 Active Active 218.0 Acres
## 5 Complete in Maintenance Active 50.0 Acres
## 6 Active Active 300.0 Acres
## 7 Active Active 34.0 Acres
## 8 Active Active 5.0 Acres
## 9 Active Active 120.0 Acres
## 10 Active Active 60.8 Acres
## TREATED_ACRES TREATMENT_SHAPE BROAD_VEG_TYPE RECORD_UPDATED FY
## 1 536.4 Polygon Grass 2023-05-04 17:00:00 22/23
## 2 363.0 Polygon Grass 2023-06-21 17:00:00 22/23
## 3 493.4 Polygon Brush 2022-07-18 17:00:00 21/22
## 4 218.0 Polygon Grass 2022-07-18 17:00:00 20/21
## 5 50.0 Polygon Grass 2023-08-07 17:00:00 23/24
## 6 300.0 Polygon Brush 2023-05-07 17:00:00 22/23
## 7 34.0 Polygon Grass 2023-06-18 17:00:00 22/23
## 8 5.0 Polygon Grass 2023-06-28 17:00:00 22/23
## 9 120.0 Polygon Grass 2022-07-18 17:00:00 21/22
## 10 60.8 Polygon Brush 2023-03-15 17:00:00 21/22
## ThisFiscal LastFiscal PrevFiscals OBJECTID_1 CFIP_FR CONTRACT
## 1 N Y N NA <NA> <NA>
## 2 N Y N NA <NA> <NA>
## 3 N N Y NA <NA> <NA>
## 4 N N Y NA <NA> <NA>
## 5 Y N N 374161 N N
## 6 N Y N NA <NA> <NA>
## 7 N Y N NA <NA> <NA>
## 8 N Y N NA <NA> <NA>
## 9 N N Y NA <NA> <NA>
## 10 N N Y NA <NA> <NA>
## ACTIVITY_START_date PROJECT_START_DATE_date SHAPE
## 1 2023-04-20 2023-04-20 MULTIPOLYGON (((-13517829 5...
## 2 2023-06-16 2023-06-17 MULTIPOLYGON (((-13268671 4...
## 3 2022-01-24 2022-01-28 MULTIPOLYGON (((-13673185 4...
## 4 2021-06-24 2021-06-24 MULTIPOLYGON (((-13436605 4...
## 5 2023-07-18 2023-07-19 MULTIPOLYGON (((-13597985 4...
## 6 2023-04-24 2023-04-28 MULTIPOLYGON (((-13400107 4...
## 7 2023-06-16 2023-06-17 MULTIPOLYGON (((-13238515 4...
## 8 2023-06-22 2023-06-23 MULTIPOLYGON (((-13238515 4...
## 9 2021-09-23 2021-09-23 MULTIPOLYGON (((-13805846 5...
## 10 2022-03-01 2022-04-01 MULTIPOLYGON (((-13718275 4...
act_broadcast %>%
filter(!TREATMENT_NAME %in% trt_broadcast$TREATMENT_NAME)
## Simple feature collection with 345 features and 40 fields
## Geometry type: MULTIPOLYGON
## Dimension: XY
## Bounding box: xmin: -13836290 ymin: 3843456 xmax: -12942550 ymax: 5161286
## Projected CRS: WGS 84 / Pseudo-Mercator
## First 10 features:
## PROJECT_ID TREATMENT_ID ACTIVITY_ID AQ_ID PROJECT_NAME
## 1 7604 14761 29322 346913 Tule Lake Rx 1A
## 2 4943 6741 29593 359058 Herbert Burn
## 3 7428 12760 23636 224350 Williams Ranch
## 4 2242 3207 21917 179217 SLU-Camp SLO
## 5 5042 6804 29998 374161 Wiggins Burn/Class
## 6 7302 14758 29697 358097 I-5 RX1 Burn
## 7 7302 14758 29779 361297 I-5 RX1 Burn
## 8 7863 12320 22572 198739 State Parks Fuel Reduction
## 9 3785 14689 29072 332246 Bridges VMP
## 10 6687 14699 29102 333457 Lower Klamath RX
## TREATMENT_NAME ACTIVITY_NAME
## 1 Tule Lake RX 2023 Broadcast 2023
## 2 Herbert Burn 2023 Burn
## 3 22 Williams Ranch RX 22 Williams Ranch RX
## 4 Camp SLO Rx Burn 2021 Camp SLO
## 5 2023 (and 2017)Wiggins Burn/Class Wiggins Burn Class (234) 2023
## 6 Grapevine Flats Rx Burn 2023 PSB Northbound Flats and Lower
## 7 Grapevine Flats Rx Burn 2023 PSB Southbound Lower
## 8 Boyes Prairie Rx 2021 Rx Burn
## 9 2022 Bridges Rx Fire 2022 Bridges Rx Fire - Broadcast Burn
## 10 Lower Klamath RX 2023 Broadcast 2023
## CALMAPPER_ID REGION UNIT UNIT_CODE
## 1 2600-2021-FPL-001 NORTH Siskiyou Unit (SKU) SKU
## 2 4100-2017-FPL-008 SOUTH Tulare Unit (TUU) TUU
## 3 2400-2020-VMP-001 NORTH Shasta-Trinity Unit (SHU) SHU
## 4 3400-2015-FPL-008 SOUTH San Luis Obispo Unit (SLU) SLU
## 5 1400-2017-FPL-008 NORTH Sonoma-Lake-Napa Unit (LNU) LNU
## 6 4010-2020-FPL-006 SOUTH Kern CFD (KRN) KRN
## 7 4010-2020-FPL-006 SOUTH Kern CFD (KRN) KRN
## 8 1200-2021-FPL-006 NORTH Humboldt-Del Norte Unit (HUU) HUU
## 9 1100-2016-VMP-004 NORTH Mendocino Unit (MEU) MEU
## 10 2600-2019-FPL-016 NORTH Siskiyou Unit (SKU) SKU
## COUNTY_NAME PROJECT_TYPE TREATMENT_OBJECTIVE
## 1 Siskiyou County Fire Plan Broadcast Burn
## 2 Tulare County Fire Plan Broadcast Burn
## 3 Shasta County VMP Broadcast Burn
## 4 San Luis Obispo County Fire Plan Broadcast Burn
## 5 Colusa County Fire Plan Broadcast Burn
## 6 Kern County Fire Plan Broadcast Burn
## 7 Kern County Fire Plan Broadcast Burn
## 8 Humboldt County Fire Plan Broadcast Burn
## 9 Mendocino County VMP Broadcast Burn
## 10 Siskiyou County Fire Plan Broadcast Burn
## OBJECTIVE_FULL ACTIVITY_DESCRIPTION GROUND_DISTURBING
## 1 Broadcast Burn (Polygon) Broadcast Burn Yes
## 2 Broadcast Burn (Polygon) Broadcast Burn Yes
## 3 Broadcast Burn (Polygon) Broadcast Burn Yes
## 4 Broadcast Burn (Polygon) Broadcast Burn Yes
## 5 Broadcast Burn (Polygon) Broadcast Burn Yes
## 6 Broadcast Burn (Polygon) Broadcast Burn Yes
## 7 Broadcast Burn (Polygon) Broadcast Burn Yes
## 8 Broadcast Burn (Polygon) Broadcast Burn Yes
## 9 Broadcast Burn (Polygon) Broadcast Burn Yes
## 10 Broadcast Burn (Polygon) Broadcast Burn Yes
## BURN_TYPE AGENCY_NAME AGENCY_LOCAL_NAME
## 1 Cooperator Assist CAL FIRE SKU
## 2 Training Burn CAL FIRE <NA>
## 3 VMP CAL FIRE SHU
## 4 Training Burn CAL FIRE SLU
## 5 Training Burn CAL FIRE <NA>
## 6 Training Burn Contract County Kern County Fire Department
## 7 Training Burn Contract County Kern County Fire Department
## 8 Cooperator Assist CAL FIRE <NA>
## 9 VMP CAL FIRE <NA>
## 10 Cooperator Assist CAL FIRE SKU
## COOPERATOR ACTIVITY_START ACTIVITY_END
## 1 US Fish and Wildlife Service (USFWS) 2023-04-19 17:00:00 2023-04-19 17:00:00
## 2 <NA> 2023-06-15 17:00:00 2023-06-16 17:00:00
## 3 <NA> 2022-01-23 16:00:00 2022-01-27 16:00:00
## 4 <NA> 2021-06-23 17:00:00 2021-06-23 17:00:00
## 5 <NA> 2023-07-17 17:00:00 2023-07-18 17:00:00
## 6 <NA> 2023-06-15 17:00:00 2023-06-16 17:00:00
## 7 <NA> 2023-06-21 17:00:00 2023-06-22 17:00:00
## 8 California State Parks (CSP) 2021-09-22 17:00:00 2021-09-22 17:00:00
## 9 <NA> 2022-02-28 16:00:00 2022-03-31 17:00:00
## 10 US Fish and Wildlife Service (USFWS) 2023-02-16 16:00:00 2023-02-16 16:00:00
## PROJECT_STATUS ACTIVITY_STATUS QUANTITY UNIT_OF_MEASURE
## 1 Active Active 536.4 Acres
## 2 Active Complete 363.0 Acres
## 3 Active Active 493.4 Acres
## 4 Active Active 218.0 Acres
## 5 Complete in Maintenance Active 50.0 Acres
## 6 Active Active 34.0 Acres
## 7 Active Active 5.0 Acres
## 8 Active Active 120.0 Acres
## 9 Active Active 60.8 Acres
## 10 Active Active 1459.8 Acres
## TREATED_ACRES TREATMENT_SHAPE BROAD_VEG_TYPE RECORD_UPDATED FY
## 1 536.4 Polygon Grass 2023-05-04 17:00:00 22/23
## 2 363.0 Polygon Grass 2023-06-21 17:00:00 22/23
## 3 493.4 Polygon Brush 2022-07-18 17:00:00 21/22
## 4 218.0 Polygon Grass 2022-07-18 17:00:00 20/21
## 5 50.0 Polygon Grass 2023-08-07 17:00:00 23/24
## 6 34.0 Polygon Grass 2023-06-18 17:00:00 22/23
## 7 5.0 Polygon Grass 2023-06-28 17:00:00 22/23
## 8 120.0 Polygon Grass 2022-07-18 17:00:00 21/22
## 9 60.8 Polygon Brush 2023-03-15 17:00:00 21/22
## 10 1459.8 Polygon Grass 2023-03-19 17:00:00 22/23
## ThisFiscal LastFiscal PrevFiscals OBJECTID_1 CFIP_FR CONTRACT
## 1 N Y N NA <NA> <NA>
## 2 N Y N NA <NA> <NA>
## 3 N N Y NA <NA> <NA>
## 4 N N Y NA <NA> <NA>
## 5 Y N N 374161 N N
## 6 N Y N NA <NA> <NA>
## 7 N Y N NA <NA> <NA>
## 8 N N Y NA <NA> <NA>
## 9 N N Y NA <NA> <NA>
## 10 N Y N NA <NA> <NA>
## ACTIVITY_START_date PROJECT_START_DATE_date SHAPE
## 1 2023-04-20 2023-04-20 MULTIPOLYGON (((-13517829 5...
## 2 2023-06-16 2023-06-17 MULTIPOLYGON (((-13268671 4...
## 3 2022-01-24 2022-01-28 MULTIPOLYGON (((-13673185 4...
## 4 2021-06-24 2021-06-24 MULTIPOLYGON (((-13436605 4...
## 5 2023-07-18 2023-07-19 MULTIPOLYGON (((-13597985 4...
## 6 2023-06-16 2023-06-17 MULTIPOLYGON (((-13238515 4...
## 7 2023-06-22 2023-06-23 MULTIPOLYGON (((-13238515 4...
## 8 2021-09-23 2021-09-23 MULTIPOLYGON (((-13805846 5...
## 9 2022-03-01 2022-04-01 MULTIPOLYGON (((-13718275 4...
## 10 2023-02-17 2023-02-17 MULTIPOLYGON (((-13545180 5...
map <- mapview(list(trt_broadcast, act_broadcast), col.regions=list("red","blue"),col=list("red","blue"))
map